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° Il tritacervelli 


* Gestione c/c 


= Da 






LE ICONE 


Gli articoli presentati sulla rivista, sono contrassegnati da particolari simboli che ne identifi- 
cano la natura. Eccoveli brevemente spiegati... 


LA POSTA. Nei limiti consentiti dal- 
lo spazio, pubblicheremo di volta in 
volta le richieste e le proposte di 
chiunque voglia partecipare per ren- 
dere più interessante la nostra rivista. 


TYPE-IN . Dedicato al programma 
MLX necessario per digitare i pro- 
grammi in I.m. da personalizzare. E' 
possibile anche il loro caricamento, il 
salvataggio e il trasferimento 


TRUCCHI E SEGRETI. E' |a pagina 
dedicata ai programmi semplici e biz- 
zarri. Non li troverete su disco, ma 
sono brevi e facili da inserire diretta- 
mente da tastiera.. 


IL MERCATO. Se volete che Ì vostri 
messaggi trovino riscontro, spedite- 
celi e verranno pubblicati. Non pren- 
deremo in considerazione annunci a 
scopo di lucro. 


L'ANGOLO DEL TECNICO. Per 
conoscere nei minimi particolari il 
funzionamento del vostro computer, 
la miglior cosa è una analisi appro- 
fondita tipo assistenza tecnica. 


ON-DISK. Troviamo qui i program- 
mi registrati su disco, ma non listati 
nelle pagine della rivista. Utility, gio- 
chi e di tutto un po': caricateli e fateli 
girare, è il massimo! 


LISTING. | programmi listati in que- 
ste pagine, anche se presenti su di- 
sco e già pronti all'uso, posseggono 
una particolare struttura che ne per- 
mette la personalizzazione. 





PER | CARATTERI STRANI... 


| programmi in BASIC listatisuSC64 contengono una particolare codifica dei caratteri di controllo che sullo schermo appaiono 
sottoforma di simboli grafici, questo per rendere più leggibili i listati e per permettere la stampa degli stessi anche su stampanti 
a margherita. | listati contengono spesso alcuni caratteri racchiusi tra parentesi graffe {} le quali, non esistendo sulla tastiera 
del computer, non devono essere digitate in quanto hanno appunto l'unico scopo di indicare che i caratteri in esse racchiusi 
sono caratteri di controllo. Peresempio, {CUR.GIU} indicache occorre premere una volta iltasto cursore verso il basso, mentre 
{3 CUR.GIU} indica che il tasto cursore verso il basso dovrà essere premuto 3 volte. | caratteri, sempre racchiusi tra parentesi 
graffe, preceduti da CBM, devono essere premuti unitamente al tasto Commodore (che si trova nell'angolo in basso a sinistra 
della tastiera) Per esempio, {CBM A} indica che deve essere premuto il tasto Commodore insieme al tasto A. Infine, alcuni 
caratteri racchiusi nelle parentesi graffe e preceduti da SHIFT indicano che il carattere seguente deve essere digitato tenendo 
premuto il tasto SHIFT. La tabella riporta la codifica dei principali caratteri di controllo utilizzata nei nostri listati. | listati in 
linguaggio macchina, che sono totalmente formati da numeri e lettere, non possono essere copiati direttamente col computer, 
ma richiedono l'utilizzo dello speciale programma MLX1.1 riportato, insieme alle istruzioni, nelle due pagine precedenti. 
Ricordiamo, ancora una volta, che i programmi pubblicati sulla rivista si trovano già registrati e pronti all'uso sul disco 
allegato, per cui i listati vengono forniti solo a scopo amatoriale per coloro i quali volessero ribatterseli per personalizzarli 
o modificarli a proprio piacimento. 


TABELLA DEI TASTI E DEI CARATTERI 


Quando 
leggete: 


{BLUE} 


Di 


[YELLOW 


DO 
CÈ 


[ORANGE] 
[BROWN] 
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[GREEN] 


Da CONEZZZONO 
CERAGGGERCA 
CORCORECOESNEN 


E SE IL DISCO NON FUNZIONA? 


Può succedere che il disco allegato alla rivista si rifiuti di funzionare anche seguendo le istruzioni fornite a pagina 3 o quelle suggerite nel relativo 
articolo: quando ciò accade la causa è, di solito da attribuire ad un danneggiamento fisico del disco stesso causato da un cattivo recapito o da 
un difetto della macchina di duplicazione. Qualora si verificasse questa situazione, preghiamo di ritornare all'indirizzo sotto riportato, il disco 
difettoso che sarà sostituito e recapitato al mittente nel più breve tempo possibile. Rispedire a: 

DTP Studio via Matteotti, 14 - 28043 Bellinzago Novarese (NO). 





EDITO 


E' con grande rammarico che informiamo tutti i nostri 
lettori che il presente fascicolo è l'ultimo della serie 
SC64. Nata in seguito alla chiusura della gloriosa 
Supercommodore nel dicembre del 1991, la nostra 
piccola (solo di fogliazione...) rivista ha voluto sfidare un 
mercato ormai in declino, quello che voleva il Commodo- 
re 64 come un computer dedito ormai ai soli giochi. 
Ebbene, da un rapido, ma vasto sondaggio, è derivato che 
anche nel campo ludico il Commodore 64 stà segnando il 
passo davanti all'incalzare sempre più prepotente di 
computer più potenti (PC, Amiga...) e specialmente delle 
console giapponesi... Si sa, tutte le cose terrene hanno un 
inizio ed un termine, ma la resa delle armi da parte di 
quello che sicuramente è stato il calcolatore più diffuso 
anche tra i non addetti ai lavori, è più che onorevole e 
rimmarrà come una pietra miliare nella storia 
dell'informatica. Un grazie di cuore a tutti coloro i quali ci 
hanno seguito con dedizione e pazienza perdonandoci 
talvolta alcune leggerezze sfuggiteci per la foga di divul- 
gazione. Un ciao (0 forse chissà, un arrivederci...) da 
parte dell'intero staff di quella che fu una SuperRivista!!! 


COME CARICARE | PROGRAMMI DA DISCO... 


Tutti i programmi riportati all'interno della rivista trovano posto sul disco 
da 5 1/4" allegato. Il loro caricamento avviene in modo classico con il 
comando LOAD"nome file", 8 seguito da RETURN. Alla com- 
parsa del messaggio READY col cursore lampeggiante, digitare RUN 
seguito da RETURN per lanciare il programma. Se alcuni programmi 
necessiteranno di sistemi particolari di caricamento, questi verranno di 
volta in volta riportati nel contesto dell'articolo che si riferisce al 
programma stesso. Per conoscere il nome del file da caricare, è suffi- 
ciente richiamare e listare la directory del disco usando il comando 
LOAD"$",8 seguito da RETURN. Alla comparsa del messaggio 
READY col cursore lampeggiante, digitare LT sT seguito da RETURN. 
E' possibile caricare i programmi direttamente dalla directory con la 
procedura che segue: - portare (con itasti direzionali) il cursore lampeg- 
giante all'inizio della linea contenente il nome del programma - digitare 
LOAD - portare il cursore lampeggiante (con i 

tasti direzionali) all'immediata destra del nome 

del programma dopo gli apici di chiusura - battere 

8: - far seguire RETURN - all'apparizione del 

messaggio READY col cursore lampeggiante, 

battere RUN : - il programma verrà così lanciato. 
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La posta 





la parola ai lettori... 


LE VARIABILI 
LE VOGLIO LISTÀRE 


Sono un possessore di un C128D. Incoraggiato dalla 

cortesia con la quale avete risposto alle lettere dei 

lettori, chiedo il vostro aiuto per risolvere questi miei 

problemi che, forse a voi potranno apparire abba- 

stanza elementari: 

a) Come posso stampare l'elenco delle variabili uti- 

lizzate in un programma? 

b) In che modo è possibile stampare a colori con la 

OKIMATE 20 degli istogrammi realizzati con pro- 

grammi commerciali? 

c) Si possono collegare al monitor duale 1901 due 

computer (C128 e Plus/4) contemporaneamente? 
G. Santo - ANCONA 


a) Conoscere quali variabili sono state utilizzate non 
è una cosa molto semplice: di solito l'elenco viene 
realizzato con un programma apposito (in linguaggio 
macchina), che esplora la memoria delle variabili e 
stampa il nome ed il valore di ognuna. Questo pro- 
gramma deve distinguere tra variabili numeriche ed 
alfanumeriche, e per quelle numeriche fra intere e 
reali. Senza parlare dei vettori, da considerarsi come 
gruppi di variabili. Come aiuto allo sviluppo perso- 
nale, ecco alcune indicazioni sul formato di memoriz- 
zazione usato: 

e variabili numeriche reali: sono memorizzati i primi 
2 caratteri, poi 1 byte di esponente e 4 byte di 
mantissa. Bisogna quindi prelevare il nome (se è 
composto di un solo carattere, il secondo byte è 0), 
stamparlo e chiamare la routine del BASIC che resti- 
tuisce il valore associato a quel nome di variabile. 
Purtroppo, non disponiamo del disassemblato del 
BASIC del C128 e non possiamo fornire l'indirizzo di 
questa routine; 

e numeriche intere: ad ognuno dei 2 byte del nome 
viene sommato 128, per distinguerle dalle reali; i 2 
byte successivi rappresentano il valore; 

e variabili stringa: abbiamo 2 byte del nome, e al 
secondo viene sommato 128; segue 1 byte di lun- 
ghezza e 2 byte con l'indirizzo della stringa: infatti, le 
variabili alfanumeriche hanno il nome della parte 
bassa della memoria e la sequenza di caratteri nella 
parte alta; quando cambiamo la stringa associata ad 
unavariabile, allungandola o accorciandola, il BASIC 
pone la nuova stringa subito prima di tutte le altre già 
presenti, senza cancellare quella vecchia e cambian- 
do solo l'indirizzo. 

Può succedere, facendo il dump delle variabili, di 


vedere un nome che non sembra apparire nel pro- 
gramma, ad esempio TE: in questo caso è probabile 
che nel programma sia definita una variabile TEM, o 
TEMP o qualunque altro nome con più di 2 caratteri. 
Bisogna ricordare infatti che nel programma una 
variabile può avere un nome lungo quanto si vuole, 
ma inmemoria, per motivi di spazio, sono posti solo 
i primi 2 caratteri, per questo detti significativi. 

b) Per le stampe a colori il programma di disegno 
(purtroppo hai dimenticato di dire quale sia) nella 
sezione dedicata alla stampa deve prevedere la stam- 
pante OKIMATE 20. Se non appare la scelta relativa, 
alloraè meglio rinunciare o cercare un DR/VER, ossia 
un programma in grado di pilotare la OKI20 e di 
riconoscere il formato del disegno da riprodurre. 
c) E' possibilissimo collegare al 1901 I'RGB del 128 
eil composito del Plus/4: naturalmente non ci si deve 
aspettare di vedere i due schermi contemporanea- 
mente! 


UNO PIU' UNO, FA... UNO 


Houn C128esolo il registratore; vorrei sapere com'è 
possibile appendere in coda a un programma già 
esistente inmemoria quello salvato precedentemente 
Su Nastro... 

G. Quaranta - CASERTA 


L'operazione di congiunzione di due programmi allo 
scopo di ottenerne uno solo si chiama MERGE. Il 
MERGE su C128 è facilitato moltissimo dal Monitor 
incorporato, e non richiede una procedura comples- 
sa. Ecco i passi da effettuare: 

© entrare in Monitor con il comando MONITOR 

e scrivere: > 1210 <RETURN>. Si vedrà una riga di 8 
byte esadecimali: a noi interessano i primi 2, in 
$1210-1211, che rappresentano l'indirizzo di fine 
programma 

e scrivere: > 2D <RETURN>. Altra riga di 8 byte: i 
primi 2, in$2D-2E, sonol'indirizzo d'inizio del BASIC 
e ora prendiamo l'indirizzo in$1210-1211esottraia- 
mogli 2 (la fine del BASIC è segnata da 2 byte 0, che 
dobbiamo escludere): nella sottrazione occorre ri- 
cordare che si tratta di un valore esadecimale (cisono 
quindi anche le lettere da A a F) e che in memoria è 
scritto nel formato inverso, byte basso/byte alto 

e scriviamo il nuovo indirizzo in$2D-2E dopo averne 
annotato su un foglio il contenuto 

e ora siamo pronti per caricare, sia da nastro che da 


SZ 
ai 


disco: usciamo dal Monitor con X < RETURN > 

e diamo LIST per curiosità - non dovrebbe esserci 
niente - e poi carichiamo il nuovo programma 

e se i due programmi hanno dei numeri di linea 
uguali, allora dovremo rinumerarli in modo che la 
prima linea del secondo sia maggiore dell'ultima 
linea del primo 

e caricato il secondo, torniamo in Monitor 

e scriviamo: > 2D < RETURN > 

e rimettiamo il vecchio indirizzo in $2S-2E (normal- 
mente è $1C01, rispettivamente 01 1C) 

e usciamo dal Monitor con X 

e listiamo solo la prima linea, portandovi sopra il 
cursore, poi premiamo < RETURN >, come se voles- 
simo riimmetterla: dobbiamo farlo per riaggiustare il 
link di tutte le linee, o LIST non funzionerà 

e ora, tanto per vedere che c'è , possiamo dare LIST 
e guardarci i due programmi uniti. 

E' molto importante che le linee delle due parti siano 
in ordine crescente e non vi siano righe con lo stesso 
numero, pena l'insuccesso dell'operazione. Ovvia- 
mente, è possibile scrivere un programma capace di 
fare automaticamente tutto quanto appena descritto. 


BRESRERERGRLERLREEEEEN 
- 


HA PERSO LA VOCE 


...US0 il C128 principalmente in modo 64 per gioca- 
re. Uno degli aspetti più interessanti è il suono, 
capace di rendere alcuni programmi di simulazione 
molto avvincenti, quasi reali. Ora però, il mio compu- 
ter è muto; lo schermo è perfetto, vengono riprodotti 
grafici e animazioni come prima, ma non c'è verso di 
sentire neanche il più banale dei rumori... 

L. Roversi - IMPERIA 


La causa della perdita delle capacità sonore del 128 
o di un 64 sono in genere dovute alla rottura del SID, 
il generatore sonoro, vera e propria ugola del compu- 
ter. Purtroppo l'unica cosa da fare è provvedere alla 
sua sostituzione; operazione questa da affidare a per- 
sonale specializzato specialmente se l'integrato ri- 
sultasse saldato direttamente alla scheda. Tra l'altro, 
è molto difficile reperirlo al di fuori dei centri di 
assistenza Commodore autorizzati, perché è un chip 
custom, ossia un componente disegnato e fabbricato 
appositamente dalla casa per l'impiego specifico nei 
personal 128 e 64. La posizione sullo scherma è 
contraddistinta dalla sigla U18, mentre la sigla del 
circuito è 6581. 


i ZZZ ZON O MA 


AVVISO 
AI 
LETTORI 


Si può facilmente immaginare a cosa questo avviso si riferisca! 

Come già riportato nell'editoriale che trovate in apertura a pagina 3, annunciamo 
che, purtroppo, questo è l'ultimo fascicolo bimestrale della serie di sei 
iniziata con la chiusura della rivista Supercommodore 64 e 128 avvenuta 
col mese di dicembre del 1991. Anche quest'ultimo baluardo crolla 
davanti all'incedere di macchine più potenti il cui costo ha raggiunto livelli 
ormai accessibili al grande pubblico. Quella da noi tentata va considerata come 
una estrema prova di tenere in vita quello che sicuramente è stato l'home 

computer più amato (e più venduto) dell'ultimo decennio. 

Le spese necessarie a mantenere in vita una rivista come la presente (si pensi 
specialmente alla stampa, alla duplicazione dei dischi ed alla postalizzazione) 
superano non di poco il contributo che, coraggiosamente avete messo 
a nostra disposizione e, giunti a questo punto, non ci è veramente più possibile 
sostenere la pubblicazione anche tenendo conto del fatto che 
il software a disposizione per il Commodore 64 e per il Commodore 128 
risulta sempre più introvabile in commercio. Anche i programmatori 
sono passati a sistemi più evoluti relegando il loro grosso bagaglio 
derivato dall'esperienza sessantaquattristica in BBS 
(perlopiù statunitensi...) difficilmente accessibili dal grande pubblico. 
Terminiamo queste poche righe ringraziando tutti coloro i quali hanno 
contribuito ad allungare anche se solo per un anno la vita del glorioso 8 bit 
ed un particolare ringraziamento va anche a tutti i collaboratori che, 
con la loro opera hanno dato vita al nostro bimestrale, partendo dai redattori e 
impaginatori, già a suo tempo coinvolti nella pubblicazione di 
Supercommodore e giungendo ai duplicatori dei dischetti. 


la redazione 








On-disk 


Dal momento della nascita del drive 1571 per il 64 sì 
sono visti in giro un buon numero di programmi per 
la formattazione veloce dei dischetti. Questi pro- 
grammi incrementano notevolmente le performance 
del drive in materia di tempi per le operazioni di 
formattazione. La Commodore ha probabilmente preso 
una bella lezione da questi programmatori ed ha così 
aggiunto una routine per formattare più efficiente al 
suo drive 1571.1I drive formatta ora un disco a doppia 
faccia in 41 secondi, ma secondo me una maggiore 
velocità di certo non guasterebbe. Quickly Format 
128 è il programma che lo permetterà. Si tratta di 
un'utility per il 128 facile da usare che dimezza i tempi 
richiesti per formattare tutte e 70 le tracce di un disco 
a doppia faccia. Per un disco a singola faccia ci 
vorranno meno di 12 secondi. 

Una volta che Quickly Format 128 è stato generato, 
può essere caricato e attivato con il comando 
RUN"QUICKLYFORMAT".A questo punto dovrete ri- 
muovere il disco contenente il programma e inserire 
quello da formattare. Vi verrà chiesto di indicare se 
volete formattare solo una o tutte e due le facce del 





disco. Se dovete accedere frequentemente ai vostri 
file dal modo 64 al 128 è meglio formattare solo la 
parte alta del disco. Questo preverrà il noioso mes- 
saggio d'errore ILLEGAL TRACK OR SECTOR che 
appare quando parte del file da aprire risiede sulla 
seconda faccia del disco. 

Vi verrà quindi chiesto di specificare se volete verifi- 
care la formattazione. Se rispondete sì verranno letti 
e controllati per cercare eventuali errori i settori di 
ogni traccia. Se sceglierete questa opzione rallente- 
rete molto il procedimento di formattazione. Se inve- 
ce volete ottenere il massimo della velocità non 
dovrete far altro che ignorarla. L'opzione verify è stata 
inclusa per venire incontro alle necessità dei diversi 
utenti. Il 1571 sbaglia di rado e quindi se siete certi 
che la testina del vostro drive sia ben allineata potete 
omettere le operazioni di verifica; stesso discorso 
vale se il dischetto utilizzato è di qualità. Se invece, 
l'idea di non fare la verifica, vi preoccupa, utilizzate 
l'opzione. Stesso discorso vale se disponete di un 
disco generico o di scarsa qualità oppure se volete 
formattare tutte e due le facce di un disco che dovreb- 


va 


be invece essere usato solo su singola faccia: in 
questo caso è d'obbligo la verifica. In questi casi, 
cautela e tempo extra potrebbero evitare di trovarvi di 
fronte a spiacevoli problemi. Inserite il nome del 
disco come fareste in una routine di formattazione 
normale; il nome non deve essere lungo più di 16 
caratteri e seguito da un ID di due caratteri. L'ID verrà 
scritto come appendice per ogni settore sul disco, e 
il suo principale scopo è di indicare al drive quando 
cambiate il disco nel drive. Una volta premuto RE- 
TURN, il disco verrà formattato. State molto attenti a 
non lasciare nel drive il disco con Quickly Format. Per 
esserne certi proteggetelo. Il programma controllerà 
esicomporterà di conseguenza. Se è protetto, il disco 
non verrà formattato ed apparirà un messaggio d'er- 
rore; il mio consiglio è di proteggere sempre tutti i 
dischi. Quickly Format lavora riprogrammando il 
disk drive. Trasferisce una sezione di codice al buffer, 
all'indirizzo $0500. Una volta attivato, il programma 
copia la routine di formattazione standard dal drive 
ROM alla RAM interna e apporta alcune variazioni. Se 
non scegliete l'opzione verify queste routine verran- 
no oltrepassate. Risparmierete tempo usando un 
valore fisso per intervallare i settori su tutte le tracce. 
La routine standard per formattare, invece, scrive e 
riscrive ogni traccia per calcolare la lunghezza indi- 
viduale dei gap all'interno dei settori. Queste modifi- 
che, in coppia con l'intercambio veloce dei settori, 
rendono molto più veloce Quickly Format. | dischetti 
formattati con questo programma lavorano bene come 
quelli formattati usando la routine standard. 
Percaricare: battere LOAD2QUICKLYFORMAT 128",8 
seguito da RETURN e quindi RUN. 





TOP DECODER 





Se amate rivolvere i diagrammi di parole crittografate 
che appaiono su molte riviste di enigmistica, vi 
renderete presto conto che Top Decoder è quello che 
fa per voi. Gli amanti dell'enigmistica che già le 
conoscono, potranno utilizzare il programma per 
esercitarsi nella risoluzione di questi schemi; per chi 
tra di voi invece non ha mai provato nè visto niente 
del genere, diciamo che si tratta di sostituire a dei 
numeri delle lettere, secondo il criterio che a numero 
uguale corrisponde lettera uguale. 

Top Decoder non risolverà il diagramma per voi, ma 
vidarà mododi visualizzare sia il diagramma origina- 
riochela versione decodificata di quest'ultimo, mentre 


starà a voi inserire le varie sostituzioni. Caricate e 
lanciate il programma; vi verrà richiesto di scegliere 
uncrittogramma; fatelo e ricordatevi quindi di premere 
RETURN per spostarvi tra levarie linee delloschema 
Una volta terminata una linea si passa a quella 
successiva, ma tenete conto del fatto che è necessario 
limitare ogni parte del diagramma ad una linea in 
modo che abbiate sempre una buona visualizzazione 
della schermata. Se il vostro schema occupa meno di 
quattro linee è meglio premere RETURN per elimina- 
re le parti inutilizzate. Sotto ad ogni lettera del dia- 
gramma verrà inserito un asterisco (*); vi verrà 
chiesto di selezionare l'opzione CHAR, RESTART o 


QUIT e per fare la vostra scelta dovrete premere 
rispettivamente le lettere GC, R o Q. Quando volete 
apportare una variazione ad un carattere che avevate 
già inserito nello schema premete la G, digitate la 
lettera che volete cambiare e premete RETURN. Ai 
comando successivo, SUB, inserite la lettera che 
volete provare a sostituire. Premete RETURN e la 
schermata verrà visualizzata nuovamente con la lette- 
racheavete cambiato stampata nella giusta posizione. 
Seadun certo punto del vostro lavoro volete ricomin- 
ciare a lavorare sullo stesso crittogramma seleziona- 
tel'opzioneR(chesta per RESTART) quando viverrà 
richiesto e vedrete apparire lo schema originario 
(quello senza la sostituzione dei numeri con le lette- 
re). Perabbandonare il programma premete Q quan- 
do vi verrà chiesto. Poiché lo statement INPUT proi- 
bisce l'inserimento di virgole o dei due punti, evitate 
di usare questo tipo di punteggiatura. Se invece 
desiderate utilizzarla ugualmente potete rimpiazzare 
virgole e due punti con caratteri alternativi. 

Per caricare: battere LOAD'TOPDECODER",8 segui- 
to da RETURN e quindi RUN. 


SIMPLE 
GRAPH 





Durante questi ultimi anni ho composto una buona 
quantità di lavori sul mio computer che includono 
grafici e disegni. Sono però sempre rimasto deluso 
dal sistema usato dal 64 per l'alta risoluzione. E mi 
arrabbio ancora di più se penso che tutto quello che 
voglio fare è un semplice grafico o disegno. All’estre- 
mo opposto nello spettro dei grafici la risoluzione 
della normale schermata testo è di solito troppo 
‘bassa per i dettagli richiesti da grafici o disegni. 
Quello che serve è un modo grafico che stia a metà 
strada tra questi due estremi cioè che offra una 
ragionevole risoluzione ma eviti la complessità col- 
legata a grafici bitmapped. Un modo grafico simile 
esiste; se inserite 





PRINTCHR$ (190) :PRINTCHR$ (188): 
PRINTCHRS$ (187) :PRINTCHR$ (172) 


vedrete quattro caratteri sullo schermo ognuno dei 
quali riempie un quadrante di un'intera cella di testo. 
Questi caratteri disabilitano la normale schermata e 
offrono al suo posto una schermata grafica a media 
risoluzione che presenta in questo modo il doppio 
della risoluzione di quella ordinaria. Questo formato 
dona una dimensione alla schermata di 80 punti in 


orizzontale e 50 in verticale, per una risoluzione totale 
di 4000 plot. Questa grafica amedia densità è utile per 
lavorare su grafici tracciati o semplici disegni e 
permette a testo e grafica di coesistere pacificamente. 
Al contrario del modo bitmap, quello a media densità 
non richiede memoria extra per registrare i dati ma 
solo un piccolo driver per grafici. Caricare il pro- 
gramma in |.m. SIMPLEGRAPH seguito da Il'esten- 
sione ,8,1 dopodiché dare il NEW e quindi la SYS che 
vediamo. Per tracciare grafici o disegni dovete sem- 
plicemente usare il comando SYS828,x,y,0n/ 
off,color, x e y sono le coordinate per i punti da 
tracciare. Il campo da 0 a 79 è quello per l'asse x e da 
0a 49 per l'asse y. on/off è un flag che determina se 
un punto dovrà essere tracciato o cancellato. Se on/ 
off è uguale a 1 il punto verrà tracciato; se on/off è 
uguale a zero il punto verrà cancellato; color corri- 
sponde al colore del punto da tracciare e deve 
trovarsi nel campo da 0a 15, che rappresenta | colori 
standard usati dal Commodore. Per esempio, per 
tracciare un punto bianco nell'angolo in alto a sinistra 
dello schermo digitate il seguente comando: 
SYS828,0,0,1,1 

In modo simile, per cancellare un punto nell'angolo 
opposto, dovrete usare il comando SYS828,79,49, 
0,1. Notate che quando stiamo cancellando un pun- 
to, il colore deve sempre essere specificato; ciò è 
necessario perché il programma controlla tutti i para- 
metri, e se un valore è al di fuori dei campi sopra 
menzionati o un qualsiasi altro parametro è stato 
dimenticato, apparirà un messaggio di SYNTAX 
ERROR. Poiché il modo a media densità uilizza la 
normale schermata di testo e colori, quando inserire- 
te il colore di un punto, questo andrà ad interferire 
anche con il colore dei tre vicini. Alcune cautele 
devono essere prese quando tracciate più di un 
colore per raggiungere l’effetto desiderato. Anche se 


questo sembra essere una copia del primo, ha il 
vantaggio di permettere a testo e caratteri grafici 
standard Commodore di integrarsi nella schermata 
grafica. Potete stampare il lavoro e inserire sulla 
schermata i valori dei caratteri come fate di solito 
Notate comunque che con il driver grafico non potete 
mai cancellare testo o caratteri che non siano grafici, 
non potete tracciare sopra altro testo o caratteri. Tutto 
ciò previene che testo e grafici vengano accidental- 
mente cancellati. Il programma dispone anche di un 
piccolo demo, scritto interamente inBASIC; quest'ul- 
timo vi darà un'idea di come potete usare il driver. 
Verranno tracciate figure Lissajous che, per chi non 
lo sapesse, sono una serie di curve trovate combi- 
nando movimenti armonici perpendicolari. Vengono 
comunemente esibite miscelando due frequenze ar- 
moniche X e Y del circuito di INPUT di un 
oscilloscopio. Prima di caricare il demo siate certi 
che Simple Graph sia ancora in memoria. Quando lo 
lanciate provate a fare degli esperimenti con i valori 
richiesti dal programma. Inserendo 1,2 producerete 
risultati diversi di quando inserirete 2,1. Il campione 
prodotto sarà monocromatico ma potete facilmente 
aggiungere colori modificando il valore della variabi- 
le colore, C, sulla linea 270. Per ottenere un effetto 
arcobaleno provate ad aggiungere al demo le linee 
che seguono: 


N 
o 


€ 


7A C=C+1 


n» 
264 IFC=16THENC=0 


o 


Ora avete un'idea di come lavora Simple Graph e 
potete provare quindi a creare alcune figure o cam- 
pioni da soli. Su disco esiste anche un demo col 
nome SIMPL.DEMO da caricare normalmente 

Per caricare: battere LOAD "SIMPLEGRAPH',8,1 se- 
guito da NEW e quindi dalla SYS (vedere testo). 





IL TRITACERVELLI 





Alcuni giochi sono molto facili da giocare ma difficili 
da capire; il Tritacervelli fa proprio parte di questa 
categoria. Questo board game per uno o due giocatori 
somiglia molto alla dama cinese. 

Troverete 32 sfere su una scacchiera che presenta un 
unicoforo scoperto. Loscopo del giocoè di eliminare 
il maggior numero possibile di sfere, rimuovendole 
saltandole con una adiacente, ma dovete sempre 
arrivare in uno spazio vuoto. 

Il Tritacervelli è scritto interamente in BASIC. Una 
volta caricato vi verrà chiesto se volete giocare oppu- 


era è 
fsi e nn 


re vedere il replay di una partita precedente; premete 
P per giocare 

Vi verrà quindi chiesto se volete giocare da soli o in 
due. Se optate per il gioco singolo inserite il joystick 
in porta 2; se giocate in due ci vogliono due joystick 
e farete a turno nel saltare le sfere che verranno 
rimosse automaticamente dopo ogni mossa. Ricor- 
date che potete saltare solo una biglia sei siete vicini 
elo spazio dall'altra parte è vuoto. Potete spostarvi in 
orizzontale, in verticale, verso destra o sinistra ma 
non in diagonale. 


Usate il joystick per posizionare il cursore sulla sfera 
desiderata; per saltarla premete il pulsante dello 
sparo e quindi spostate la leva nella direzione desi- 
derata. Se la mossa è valida il computer la farà e 
rimuoverà il pezzo saltato; se non è valida apparirà un 
messaggio d'errore. 

Quando avete rimosso tutte le sfere possibili premete 
@ per vedere il punteggio; se siete furbi e pianificate 
attentamente le vostre mosse riuscirete a eliminare 
tutte le sfere. 

Quando avete finito una partita vi verrà chiesto se 
volete salvarla. Se rispondete in modo affermativo, Il 
Tritacervelli vi chiederà di digitare il nome del file e 
quindi il vostro nome; il gioco ed ogni mossa verran- 
no salvate su disco. 

Per vedere una partita salvata, premete R per il replay 
e digitate il nome del file. Apparirà la scacchiera e Il 
Tritacervelli giocherà automaticamente ogni mossa 
che avevate fatto durante quella partita. Potete rallen- 
tare il replay delle mosse premendo la L o renderlo 
più veloce premento la F. 

Per caricare: battere LOAD'TRITACERVELLI*,8 se- 
guito da RETURN e quindi RUN. 
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BEST COMPILATION 


di Barbabella Fabrizio 


Gestione C/C è il primo di una serie di programmi inviati dal nostro abbonato. Di seguito 


troverete Tutta 
ressanti utility. 
non mancheranno di e I ( 


Gestione C/C 

E'unvalido aiuto per la gestione personale del nostro 
conto corrente bancario e sicuramente interesserà 
tutti i nostri lettori, ci è stato inviato da un nostro ab- 
bonato, il signor Barbabella, che ringraziamo anche 
a nome degli altri abbonati che sicuramente non 
mancheranno di apprezzare questa utility.E' compo- 
sto da un menù abbastanza fornito che riteniamo 
copra tutto quanto sia necessario per una corretta 
tenuta del proprio conto corrente a livello personale. 
Certo non vuole sostituirsi a un vero e proprio conto 
corrente elaborato da una vera banca, ma a livello 


ACCENSIONE 


e) Chiede se si vuole usare il drive (se "NO"= 


Chiede se si vuole usare la stampante. 


e MENU' 


FI Caricamento dati 

F3 Creazione di un nuovo archivio @ 

F& Caricamento dati con variazione 
intestazione dei campi 

F6 comandi al disco @ 

F7— Finelavoro 





- Immettere nome archivio 
Fi Immissione record - Immettere nr. campi 
F3 Menùdiricerca - Per ogni campo immettere 
F8. Salvataggio dati È Re 
F7. Fine 
- Conferma - 
= (SI)=(N0) 
FI Ordinamento 
F3 Ricerca/variazione totale 
F5. Ricerca/variazione parziale 
F7. . Fine 
FI Variazione F2 Fine lavoro 
F3. Pag. avanti F4. Pag.indietro 
FS Annullamento F6 Riattivazione Autoresettamento 
F7 Ricerca avanti F8 Ricerca indietro 





hivio 64, Autostart PRG, Totoridotto e Utildisk a completamento di queste inte- 
fa non è tutto! I| nostro lettore allega anche 


erie di giochi che certemente 
chere, Perry Mason, Frogs , 
ivertimento! 


familiare è un valido aiuto per confrontare l'esattezza 
delle registrazioni.Il menu è composto da diverse 
opzioni ma per iniziare dovete scegliere la 6 che vi 
permetterà di inserire il numero di conto corrente; 
premete quindi lo spazio per continuare; si passa 
poi all'inserimento del numero progressivo dell'ope- 
razione da compiere, della data, della causale (versa 

mento, prelevamento, saldo, competenze, ecc.) e 
dell'importo. E' possibile anche calcolare l'ammon- 
tare degli interessi maturati sul vostro conto in modo 
molto semplice oppure a fine anno vedere il riepilogo 
dei movimenti bancari con il totale delle entrate, delle 





tape per default) 


SEQUENZE FUNZIONI 









uscite, il saldo e il calcolo degli interessi maturati. 
Per caricare: battete LOAD'GESTIONE C/C*,8 segui- 
to da RETURN e quindi RUN 


TUTTARCHIVIO 64 

E' un database abbastanza elastico per la creazione e 
la registrazione di un molteplicità di dati per uno 
specifico archivio creato secondo le esigenze di 
ognuno di voi. Una volta caricato il programma vi 
verrà chiesto se volete usare il drive e la stampante: 
rispondete premendo la S per sì o la N per no. 
Apparirà quindi il menu che si compone di diverse 
opzioni: F1 per il caricamento dati; F3 per la creazio- 
ne di un nuovo archivio; F5 per il caricamento dati 
con variazione intestazione dei campi; F6 per i 
comandi al disco; F7 per uscire dal programma. 
Scegliendo l'opzione F3 dovrete immettere il nome 
dell'archivio, il numero dei campi, l'intestazione e la 
lunghezza di ogni campo; una volta terminato vi verrà 
chiesta conferma di quanto inserito; se rispondete sì 
vi verrà chiesto di premere F1 per l'immissione di 
record, F3 per accedere al menu di ricerca, F8 per il 
salvataggio dati o F7 per uscire. Il menu di ricerca è 
a sua volta composto dalle opzioni per immettere i 


TUTTARCHIVIO 64 


e MENU' 


FI Directory disco 
F3 Formatta disco 

F5 Cancella un file 
F7. Riordino deldisco 
F8 Fine 


FI Per immettere i dati 
F3 Per terminare 









FI Sort ascendente 
F7 Sort discendente 
F8 Fine 


F3 Detectorsututti i record 
F6  Detectorsu parte dei record 
F7 Fine 





dati (F1) e per tornare al menu principale (F3). 
Asua volta, il menu di ricerca è composto da diverse 
possibilità di scelta: F1 per l'ordinamento (sortascen- 
dente o discendente), F3 per la ricerca/variazione 
totale (variazione, pagina avanti, annullamento e ri- 
cerca avanti), F5 per la ricerca/variazione parziale e 
quindi F7 perfine lavoro. L'opzione per l'immissione 
dei record è fornita di un suo menu che è composto 
dalle seguenti possibilità di scelta: FI per la directo- 
ry;F3 formatta il disco; FS cancella unfile; F7 riordina 
il disco; F8 per uscire e tornare al menu 
principale. Per facilitarvi il compito date un'occhiata 
alla tabella delle varie funzioni del programma. 

Per caricare: battere LOAD'TUTTARCHIVIO",8 se- 
quito da RETURN e quindi dal solito RUN. 


AUTOSTART PRG 

Questa routine rende un programma scritto in BASIC 
autostart. La stessa routine contiene tutte le spiega- 
zioni necessarie per il funzionamento al suo interno 
e non stiamo quindi ad elencarvele in questa sede. 
Per caricare: battere LOAD'AUTOSTART PRG",8 
seguito da RETURN e quindi RUN. 


TOTORIDOTTO 

Compilate il vostro sistema (minimo sette doppie) e 
il programma elaborerà automaticamente il sistema 
ridotto da giocare. Risparmierete tempo nello svilup- 
po manuale e non correte il rischio di sbagliare 
incolonnamenti che potrebbero ingenerare false 
speranze. Vi verrà chiesto prima di tutto di digitare il 
costo di ogni colonna e quindi di battere il pronosti- 
co; premete P per proseguire o H per un'hardcopy. 
Apparirà quindi una schermata che vi deluciderà sul 
numero di colonne che sarebbe richiesto per lo 
sviluppo completo del sistema e del costo totale, 
mentre con Î| sistema ridotto che verrà elaborato, lo 
sviluppo si ridurrà ad un numero di colonne minore 
per un importo di spesa decisamente inferiore. Verrà 
quindi mostrato il rapporto di riduzione e l'importo ri- 
sparmiato sempremantenendo la certezza di realizza- 
realmeno undodici e la probabilità (circa l'11,7%) di 
fare anche un tredici, riempiendo solo due schedine 
a ricalco. Detto questo non ci resta che augurarvi 
buona fortuna...!!! 

Percaricare: battere LOAD'TOTORIDOTTO",8 segui- 
to da RETURN e quindi RUN. 


UTILDISK 

Questo programma presenta una serie di utility per il 
disco. E' composto da 9 opzioni: 

e 1. Converte un numero da binario a decimale; 

e 2. Converte un numero da decimale a binario; 

e 3. Converte un numero da decimale a esadecimale; 
e 4. Converte un numero da esadecimale a decimale; 
e 5. Rinomina un file su disco; 

® 6. Visualizza la directory del disco; 

® 7. Rileva protezioni del disco; 

® 8. Ricerca l'indirizzo iniziale di un programma in 
linguaggio macchina; 

e 9. Ricerca l'indirizzo finale di un programma in 
linguaggio macchina. 


— -ÈS 


Per caricare: battere LOAD'UTILDISK*,8 seguito da 
RETURN e quindi RUN. 


EUCHRE 

Questo game dallo strano titolo non è altro che un 
gioco di carte che si pratica con un mazzo di 24 carte 
(dal nove all'asso). All'inizio della partita scegliete la 
personalità del vostro partner e degli avversari (nor- 
male o aggressiva). Quindi colui al quale capiterà il 
jack di picche sarà il mazziere per la prima mano (a 
turno, ogni giocatore alla sinistra del mazziere sarà il 
mazziere della mano successiva). 

Il mazziere distribuirà cinque carte a testa scoprendo- 
ne una (la briscola). A cominciare dal giocatore a 
sinistra del mazziere, ognuno sceglierà se accettare o 
meno il seme scoperto come briscola. Se esso viene 
accettato (Order-up), ha inizio la partita. Se viene 
rifiutato da tutti (Pass) allora ci sarà un secondo giro, 
in cui ogni giocatore a turno ha diritto a dichiarare il 
seme che intende sia la briscola per quellamano. Una 
volta che un giocatore ha deciso per il seme di 
briscola, ha inizio la partita. Se tutti i giocatori passa- 
no c'è una successiva distribuzione di carte da parte 
del nuovo mazziere. In determinate occasioni, esiste 
la possibilità di giocare da soli (lonehand) senza il 
compagno contro la coppia avversaria; questa è una 
tattica fruttifera, ma anche pericolosa. Il giocatore che 
ne ha diritto, inizia il gioco vero e proprio, giocando 
la carta che gli conviene. Come nella briscola, vince 
il seme di briscola o, inmancanza di essa, la carta più 
alta è l'asso e il nove la più bassa. Per il seme di 
briscola, la carta più alta è invece il jack, seguito dal 
jack dello stesso colore, e poi dell'asso di briscola e 
così via. Se, come supponiamo, non ci avete capito 
proprio un bel niente vi proponiamo un esempio: la 
briscola è fiori; il valore delle briscole è: jack di fiori, 
jack di picche, asso di fiori, re di fiori, donna, dieci e 
nove di fiori. Si vince una mano se si conquistano 
almeno tre prese su.cinque. Se una coppia ordina di 
considerare valido il seme della carta scoperta dal 
mazziere, questa è tenuta a vincere la mano, pena in 
caso di sconfitta a perdere doppio (in questo caso sul 
C64 appare la scritta euchred). Si conquista un punto 
vincendo una mano, due punti se si fa cappotto, e 
quattro punti se si fa cappotto in caso stiate giocando 
soli (lonehand). Se invece state giocando in quattro, 
quista il bello. E cioè, uno sietevoi, egli altri tre sono 
(indovinate un po'...) il C64, che, oltre a farvi da 
compagno e da coppia avversaria, fa sì che nessuno 
bari nel gioco. Chi fa prima 10 punti vince. Usate i 
tasti cursore per muovere una manina stilizzata 
sulle vostre carte (le uniche scoperte e quindi visibili) 
e premete RETURN per confermare le mosse. 

Per caricare: battere LOAD'EUCHRE",8 seguito da 
RETURN e quindi RUN. 


PERRY MASON 

La trama: un delitto commesso in piena notte. La 
vittima: Michael Jackson. Sei indiziati. Improvvisate- 
vi intestigatore e scoprire l'autore dell'assassinio. 
Un colpo d'arma da fuoco riecheggia nell'aria. Nel 
corridoio giace un corpo senza vita; un rumore di 





passi ci dice che qualcuno sta fuggendo. 

... Hanno ucciso Michael Jackson!!! 

| sospetti sono concentrati solo su sei persone: 
Madonna, Mick Jagger, David Bowie, Tina Turner, 
Bob Dylan e Sting. 

Avoi il compito di scoprire l'assassino! Ma attenzio- 
ne: uno dei sospettati mente sempre, mentre un altro 
solo qualche volta: non farti ingannare. 

Interrogate i sospettati, riepilogate il tutto e quindi 
formulate un'accusa. Per scoprire l'autore dell'as- 
sassinio sono richiesti intuito, intelligenza e anche, 
perché no, un pizzico di fortuna... 

Percaricare: battere LOAD'PERRY MASON",8segui- 
to da RETURN e quindi RUN. 


BRISCOLA 

Giocate contro il Commodore in una classica partita 
dibriscola a 40 carte. Si vince quando si raggiungono 
i 61 punti. Non è previsto l'uso del joystick, ma solo 
deitasti 1,23 perindicarela carta da giocare seguiti 
da RETURN per confermare. 

Per.caricare: battere LOAD'BRISCOLA",8 seguito da 
RETURN e quindi RUN. 


SCOPA 

Come certo avete immaginato dal titolo, questo game 
vi propone di giocare una classica partita a scopa 
contro il computer. Le vostre carte sono contrasse- 
gnate dalle lettere A, Be C. Digitate il tasto corrispon- 
dente più RETURN. Se ci sono prese da effettuare, 
digitate il tasto della vostra carta più il tasto corri- 
spondente a quella carta 0 a quelle carte che volete 
prendere e quindi RETURN per confermare. Non 
barate! Il computer se ne accorge e non rende lecita 
la mossa, che dovrà essere ripetuta correttamente. 
Per caricare: battere LOAD'SCOPA",8 seguito da 
RETURN e quindi RUN. 


FROGS 

Guidate la vostra rana verde entro un labirinto alla 
caccia di una fragola che ha il brutto vizio di non 
rimanere troppo a lungo ferma in un posto. Non 
toccate le pareti del labirinto, pena la perdita di una 
vita e, soprattutto, non fatevi toccare dalla vostra 
ombra rossa che vi segue ovunque e approfitta di 
ogni vostra sosta per quanto breve, per toccarvi e 
mangiarvi una vita. Ogni fragola da voi mangiata vi dà 
dei punti, e se riuscite a far azzerare il tempo (parte da 
300 secondi a scalare) riceverete un bonus prima di 
proseguire al livello superiore. Per muovervi dovete 
premere i seguenti tasti: © per spostarvi verso l'alto; 
I (barra) per spostarvi verso il basso; Z per spostarvi 
a sinistra e G normale per spostarvi verso destra. 
Per caricare: battere LOAD'FROGS",8 seguito da 
RETURN e quindi RUN. 


MASTER MIND 

Per ultimo uno dei giochi piùfamosi da quando esiste 
il computer (...e ancora prima!). La spiegazione è 
inutile, fate girare il programma e tutto sarà chiaro. 
Per caricare: battere LOAD'MASTER MIND" 8 segui- 
to da RETURN e quindi da RUN. 











Immaginate di trovarvi sperduti nell'arida e selvaggia 
savana nel cuore dell'Africa nera e non certo per un 
tranquillo ed affascinante safari fotografico. 

Poco prima di iniziare il vostro viaggio, pensate a 
quella sera, quando un anziano signore vi raccontò di 
una strana leggenda. 

Era una di quelle sere magiche, il cielo era pulitissi- 
mo e l'aria limpida. Era da tanto tempo che non 
avevate l'occasione di godervi un simile spettacolo di 
un cielo così stellato, anche perché finalmente vi 
trovate lontano dai fastidiosi bagliori notturni della 
città. Forse fu quello straordinario vinello bevuto a 
cena, oppure quel magico spettacolo stellare, fatto 
sta che quel simpatico anziano iniziò a parlare di tanti 
anni fa quando andò in Africa. Iniziò raccontandovi 
delle tradizioni e del folklore di quei popoli, della 
bellezza e del fascino della fauna e di quei luoghi. Ad 
un certo punto il vecchio si alzò e prese da un baule 
unvecchio soprabito, rovistò nelle tasche e finalmen- 
te trovò una mappa. 

Da quel momento il vecchio divenne più serio e di 
colpo abbassò la voce come se avesse paura che 
qualcuno potesse ascoltare. Parlò di una “parola 
ultima” e soprattutto di un diamante "così grosso che 
sarebbe stato possibile giocarci a football”. A sentire 
nominare un così fantastico gioiello il vostro interes- 
se si risvegliò immediatamente e forse fu in quel 
momento che vi scattò la famosa molla e iniziaste a 
pensare seriamente a quell'avventura. Il vecchio for- 
se pensò che voi eravate la persona giusta per riuscire 
nell'impresa che lui aveva fallito di pochissimo e così 
entrò nei dettagli. Parlò di una terra ostile e sperduta 
nell'Africa Centrale e accennò alle innumerevoli dif- 
ficoltà trovate nel risolvere l'intrigo per giungere alla 
scoperta della parola chiave 

Ilsuo racconto proseguì parlandovi delle prime inutili 
ricerche nell'arsura della savana. Dopo circa un anno 
riuscì finalmente ad imparare il primitivo linguaggio 


di quei popoli e così venne alla conoscenza dell'esi- 
stenza di Almazz, il mitico diamante circondato da 
una affascinante leggenda. 

Le sue estenuanti ricerche per lungo e largo riusciro- 
no ad avvicinarlo a quel favoloso gioiello e perfino a 
farglielo trovare, maahimè rimase accecato dalla tre- 
menda luce di Almazz. A questo punto l'anziano inter- 
ruppe il raccontoevi fissò con i suoi occhi di ghiaccio 
e vi donò la preziosa mappa che aveva gelosamente 
custodito in quegli anni. Quindi salutandovi vi disse 
che nel caso trovaste la terra di Almazz non dovevate 
scordarvi di leggere le pagine del suo diario scritto 
durante il viaggio. Mentre lasciava la stanza zoppi- 
cando infine blaterò qualcosa riguardo ad una tavola 
segreta divisa in 9 pezzi. 

Il gioco inizia proprio ai confini di una savana molto 
ampia visto che ha una estensione di ben 1700 
schermi!!! 

Un ponte rotto vi impedisce di fare ritorno nella parte 
moderna e civile dell'Africa e il ricordo dei consigli e 
del racconto di quel vecchio, vi danno forza per 
affrontare il viaggio. Iniziate l'avventura con un po' 
d'acqua ed un termometro che vi informa costante- 
mente sulla vostra condizione fisica. Sopravvivere 
nel deserto non è cosa semplice ed ogni sforzo 
richiede un adeguato quantitativo di acqua. Fortuna- 
tamente, sparse per tutto il territorio esistono delle 
fontane che vi riempiono la tanica quando siete a 
corto del prezioso liquido. Durante il viaggio un 
orologio vi tiene informati sulle ore e i giorni trascor- 
si. L'arsura non è l'unica difficoltà da affrontare nel 
viaggio. Il territorio è popolato da numerosi leoni e da 
una popolazione di indigeni per niente pacifici. Per 
questo motivo siete armati di una pistola con sei 
proiettili (altri possono essere recuperati in capanne 
particolari). 

Almazz deve essere giocato utilizzando il joystick che 
deve essere collegato nella porta numero 2. La leva 





comanda la direzione del cammino del vostro esplo- 
ratore nella savana. Mantenendo la leva del joystick 
al centro il cammino sarà ad andatura lenta nella 
direzione in cui è rivolto. Muovendo la leva del 
joystick nella stessa direzione dell'esploratore au- 
menterete la velocità. 

Ogni volta che premete il pulsante, sparate un proiet- 
tile nella direzione di marcia. Anche la tastiera ha la 
sua funzione: ogni volta che premete la barra spa- 
ziatrice fate bere al protagonista l'acqua contenuta 
nella brocca. 

L'unico consiglio veramente utile in questa avventura 
è quello di imparare a sopravivere nella savana per- 
ché dovrete percorrere parecchi chilometri e soprav- 
vivere per parecchi giorni se volete arrivare alla 
scoperta del mitico gioiello. Dovete quindi imparare 
adevitare le insidie dei leoni e dei cattivissimi abitanti 
pronti ad infilzarvi con le loro lance. Avete a disposi- 
zione solo sei proiettili per volta e questo vi invita ad 
un loro uso ponderato. 

Altri proiettili potete recuperarli entrando nelle ca- 
panne con le porte. In questo modo sarete al sicuro da 
ogni pericolo, il tempo trascorrerà più velocemente 
ed ogni minuto guadagnerete un proiettile. Non per- 
dete mai d'occhio la temperatura perché quando 
raggiungerà il massimo sarà la vostra fine. Calmate 
l'arsura premendo la barra spaziatrice e sommini- 
strando l'acqua al vostro esploratore. 

Molte volte quando siete pressati da leoni o nemici 
potete tentare di frenarne l'inseguimento utilizzando 
i vari ostacoli sparsi sul percorso. 

Anche il passaggio sul ponte vi può essere utile per 
far cadere i nemici in acqua eliminandoli così senza 
sprecare un colpo. Non dimenticatevi mai il percorso 
e dove sono poste le varie fontane e capanne perché 
inmomenti difficili vi sarà utile riuscire a raggiunger- 
ne una. Correndo si consumerà maggior energia e 
avrete di conseguenza anche un maggior bisogno di 
acqua. 

Per concludere sparsi nella savana ci sono parecchi 
indovinelli. Vi possono essere di valido aiuto per 
trovare la strada giusta verso il diamante Almazz, ma 
ve lo diciamo subito, sono francamente difficili da 
risolvere. 

Non è neppure tanto facile trovarli, del resto, ma 
questa volta come a solito, saremo crudeli: non vi 
diremo nulla!!! 








Listing 


SIMPL LM 

033C:A0 03 8C D2 03 20 00 E2 8D 
0344:8A AC D2 03 D9 BE 03 BO CS 
034C:6E 99 D3 03 88 10 EB A9 A0 
0354:02 8D D7 03 4E DS 03 90 4A 
035C:06 0E D7 03 0E D7 03 4E 38 
0364:D6 03 90 03 4E D7 03 AE SF 
036C:DS 03 20 FO E9 AD D6 03 E7 
0374:18 65 DI 85 DI 90 02 E6 2E 
037C:D2 20 24 EA AO 00 BI DI 61 
0384:A2 OF DD C2 03 FO 04 CA 36 
038C:10 F8 60 AD D4 03 FO 1A 6E 
0394:E0O OF FO 15 AD D3 03 91 92 
039C:F3 8A 2C D7 03 DO 0A 18 C9 
03A4:6D D7 03 AA BD C2 03 91 F2 
03AC:D1 60 8A 2C D7 03 FO F9 6E 
03B4:38 ED D7 03 4C A7 03 4C DO 
03BC:08 AF 10 02 32 50 20 7C 64 
03C4:7E E2 6C El 7F FB 7B FF Sl 
03CC:61 EC 62 FE FC A0 00 00 65 


CRYPTO-64 

(o) CLR 

10 C$=CHR$ (147) :R$=CER$ (29) 
:U$=CHR$ (145) :DIML$ (145) 

20 PRINTC$:FORQ=32T064 
:L$ (Q)=CHR$ (0) :NEXT:L$ (91) 
=CHR$ (91) :L$ (145)=CHR$ (145) 

30 PRINT: PRINT"CRYPTOGRAM 
LINEl:":PRINT: INPUTWS$S:LW 
=LEN (W$) : IFLW=O0THENWS=U$ 

40 PRINT:PRINT"CRYPTOGRAM LINE 
2:":PRINT: INPUTX$:LX 
=LEN (X$) : IFLKX=0THENXS$=U$ 

50 PRINT:PRINT"CRYPTOGRAM LINE 
3:":PRINT:INPUTY$:LY 
=LEN (Y$) : IFLY=0THENY$=U$ 

60 PRINT:PRINT"CRYPTOGRAM LINE 
4:":PRINT:INPUTZ$:LZ 
=LEN(Z$) :IFLZ=0THENZ$=U$ 

70 PRINTC$ :FORQ=65T090 
:L$ (Q)="*":NEXT:IFW$=US$ 
THEN20 

80 PRINT:PRINT:PRINT: 
K$=W$ :P=LW:GOSUB250 

90 K$=X$:P=LX:GOSUB250 

100 KS$=Y$:P=LY:GOSUB250 

110 KS=Z$:P=LZ:GOSUB250 

120 GOSUB270:GOT0220 

130 PRINT:A$="":PRINT" 
CHAR";:INPUTA$:IF 
A$=""THEN PRINTC$:GOTO160 

140 B$="":PRINT"(2SPC}SUB"; 
:INPUT B$:IFB$=""THEN 
A$="":PRINTC$:GOTO160 

150 N=ASC(A$) :L$ (N)=B$ 

160 PRINTC$:PRINT:PRINT:PRINT 

170 K$=W$:PRINTR$+K$:P=LW 
:GOSUB260 

180  K$=XS:PRINTR$+K$: 
P=LX:GOSUB260 

190 K$=YS:PRINTRS+K$ 
:P=LY:GOSUB260 

200 K$=Z$:PRINTRS+K$ 
:P=LZ:G0SUB260 

210 GOSUB270 

220 IFS$="R"THEN GOSUB280:PRINT 
:GOTO70 

230 IFS$="Q"THEN GOSUB280 
:PRINTC$: END 

240 GOTO130 

250 PRINTR$+K$ 

260 PRINTR$;:FORN=1TOP 
:A=ASC(MID$(K$,N,1)) 
:PRINTL$ (A); :NEXT:PRINT 
: PRINT: RETURN 

270 POKE198,0:PRINT:PRINT 


— SL 


:PRINT" CHAR, RESTART, QUIT 
(C/R/Q)";: INPUT S$:RETURN 


280 POKE198,0:PRINT:PRINT" ARE 
YOU SURE (Y/N)";:INPUT S$ 

290 IFS$<>"Y"THENPRINTCS$S 
:GOTO160 

300 RETURN 

SHOWDOWN 

0 CLR 

100 DIMF(2000),G(2000) 

110 GOSUB 880 

120 GOSUB1000 

130 S=1475:0=1274:B=1391 
:C=1397:M=0:W=0:F=0:6G=0:U=0 

140 PRINT"{CLR} {HOME} 
{BLACK}":POKE 53280,12 
:POKE53281, 12 

150 PRINT"{4 CUR.GIU}{10 
CUR.DES}{RVS 0N}{4 
SPC} {CUR.GIU} {CUR.SIN} 
{CUR.GIU}{CUR.SIN} 

{5 CUR.SIN} ({CUR.SU}{CUR. 
SIN} {CUR.SU}{CUR.SIN} " 

160 PRINT"{HOME}{7 CUR.GIU} 

{7 CUR.DES}{RVS ON}{3 
SPC}{RVS 0FF}{3 SH W}{RVS 
ON}{3 SPC}{RVS OFF} 
{CUR.SU} {6 CUR.SIN} 

{3 SH W}" 

170 PRINT"{CUR.GIU}{7 CUR.DES)} 
{RVS ON} {CUR.GIU}{CUR.SIN)} 
{CUR.GIU}{CUR.,SIN}{CUR.GIU} 
{CUR.SIN}{3 SPC}{RVS OFF} 
{SH W}{RVS ON}{SH W}{RVS 
OFF} {SH W}{RVS ON}{3 SPC} 
{CUR.SU}{CUR.SIN} {CUR.SU)} 
{CUR.SIN} {CUR.SU}{CUR.SIN} 
{8 CUR.SIN}{RVS OFF}"; 

180 PRINT"{7 SH W}{CUR.GIU} 

{7 CUR.SIN}{3SH W} 
{3 SE W}" 

190 PRINT"{8 CUR.DES}{? SH W}" 

200 PRINT"{CUR.GIU}{9CUR.DES} 
{RVS ON}{RVS OFF}{3 SH W} 
{RVS ON) {RVS OFF}" 

210 PRINT"{9 CUR.DES}{RVS ON}{5 
SPC}” 

220 IFH=-1THEN 1190 

230 V=2 

240 IFV=3THEN V=1 

250 IFI=0THENV=2 

260 JO=USR (V) :GETA$ 

270 IF(JOAND15)=1THENW= 
-40:GOTO480 

280 IF (JOAND15)=4THENW= 
-1:G0T0480 

290 IF (JOAND15)=8THENW=1 
:GOTO480 

300 IF (JOAND15)=2THENW=40 
:GOT0480 

310 IF (JOAND16)=O0THEN GOTO340 

320 IF A$ ="@" THEN 610 

330 GOTO 240 

340 JO=USR(V) :IF(JOAND15)=OTHEN 
GOTO340 

350 IF (JOAND15)=1THENW= 
-40:GOTO0400 

360 IF (JOAND15)=4THENW= 
-1:GO0T0400 

370 IF (JOAND15)=8THENW=1 
:GOTO0400 

380 IF (JOAND15)=2THENW=40 
:GOT0400 

390 GOTO 240 

400 Y=S+W:R=0:IF PEEK(S)=215 


THEN R=R+1 


410 
420 
430 
440 
450 


460 
470 
480 


490 
500 
510 
520 
530 
540 
550 
560 
570 
580 
590 
600 
610 
620 
630 


640 


650 
660 
670 
680 
690 
700 
710 
720 
730 
740 
750 
760 
770 
780 
790 
800 
810 
820 


830 
840 
850 


860 
870 








IFPEEK (Y)=87THENR=R+1 
IFPEEK (S+W+W)=32THENR=R+1 
IFR=3 THEN 450 

GOTO 530 
M=M+1:POKES, 32: POKES+ 
W,32:GOSUBS560:POKE 
S+W+W, 215:S=S+W+W 
:V=V+1:U=U+1 
F(U)=1:G(U)=W 

GOTO 240 

J=0:Z=PEEK(S) :Y=S+W 
:IFPEEK(Y)=87THENQ=87 
:J=gJ+1 

IFPEEK (Y)=32THENQ=32:J=J+1 
IF J=l THEN 520 

GOSUB 530 

POKES, Z-128: POKES+W, 
Q+128:S=S+W:U=U+1:F(U)=0 
:G(U)=W:GOTO 240 
PRINT"{HOME}{22 CUR.GIU} 
ILLEGAL MOVE":GOSUB 560 
PRINT"{HOME}{22 CUR.GIU} 


{12 SPC}" 
GOTO 240 
REM 


POKE54296,15:POKE54277, 
64:POKE54273, 162 
:POKE54272,37 
POKE54276,17:FORT=1T0200 
3 NEXT 

POKE54276, 16:FORT=1T050 
:NEXT 

RETURN 

J=32-M:F (U+1)=-1:G(U+1)=0 
PRINT"{CLR}{2CUR.GIU}"; 
J;"PEGS REMAINING 
{2CUR.GIU}" 

IFJ>10THEN PRINT"POOR!" 
:W=-1:GOTO700 

IFJ>7THEN PRINT" 
SATISFACTORY PLAY!" 
:W=-1:GOTO700 

IFU>STHEN PRINT 

"GOOD! ":W=4:GOTO700 
IFJ>3THEN PRINT"GREAT!" 
:W=5:GOTO700 

IFJ>2THEN PRINT"WELL 
PLAYED!":W=11:GOTO700 
IFJ>1THEN PRINT"MISSED!" 
:W=6:GOTO700 

IFJ>OTHEN PRINT"DID IT!" 
1W=6:GOT0700 

PRINT"{3 CUR.GIU}WANT TO 
SAVE? (Y/N)" 

GETK$:IF K$=""THEN710 

IF K$<>"N"ANDK$<>"Y"THEN710 
IFK$="N" THEN 800 
INPUT"FILENAME";N$ 
:INPUT"YOUR NAME"M$ 
OPEN15, 8, 15:0PEN 
2,8,2,"@0:"+N$+",S,W" 
PRINT#2,M$ :FORV=1TOU+1 
PRINT#2,F(V) 

PRINT#2,G(V) :NEXT V 
CLOSE2:CLOSE15 

PRINT"{3 CUR.GIU}WANT TO 
PLAY? (Y/N)" 
IFW<OTHENGOTO840 
QZ=4*40:FORK=0Q7+55336 
T0QZ+55336+W:POKEK, V 
:V=V+1:IFV>255STHENV=0 
NEXT K 

GET M$:IF M$="" THEN 810 
IF M$="N"THENPRINT"{CLR}" 
:END 

IF M$="Y" THENGOTO 120 
GOTO 840 


11 





880 JJ=49152:JH=INT(J3J/256) 50 PRINT"NASTRO O DISCO [N/D]" 160 X$="{HOME}{24 CUR.GIC.® 
:JL=JJ-JH*256:POKE785, JL 55 GETMES$ : IFME$=""THEN55 170 FORK=1T013:X$ (K)= 
:POKE786,JH 60 TEMESS>"N"ANDMES<G>"D" TRENS5 LEFTS [XS, K+4) :NEXT 

890 FORK=JJTOJJ+67:READ Y 70 IFMES="N"THENME$= 180 PRINT"{CUR.GIU}{RVS 0N}*** 
:POKEK, Y:NEXT "NASTRO" : GOTO90 AIAR AIAR RITIRATA 

900 DATA 120,70,97,176,21,169, 72 ME$="DISCO" KRKKRKKKRKRKEKKXK{RVS OFF}"; 
127,141 80 POKE49223,8:POKE49225,1 190 PRINT"{RVS ON}*{RVS OFF} 

910 DATA 0,220,173,1,220,201, :POKE49242,8 {38 SPC}{RVSON}*{RVS OFF}"; 
255,240 90 PRINTCHR$ (147) "ORA CARICA 200 PRINT"{RVS ON}*{RVS OFF}{5 

920 DATA 4,169,31,208,13,173, IL TUO PROGRAMMA, PREPARA SPC}COMPILAZIONE{2 SPC} 
0,220 IL "MES; AUTOMATICA{2 SPC}DEI{4 SPC} 

930 DATA 16,8,169,255,141,0, 100 PRINT" (DIFFERENTE DA {RVS ON}*{RVS OFF}"; 
220,173 QUELLO "; 210 PRINT"{RVS ON}*{RVS O0FF}{38 

940 DATA 1,220,41,31,73,15, 110 PRINT"ORIGINALE), DIGITA SPC}{RVS ON}*{RVS OFF}"; 
208,4 SYS 49152 + RETURN"; 220 PRINT"{RVS ON}*{RVS OFF}{2 

950 DATA 133,97,240,23,133,98, 120 PRINT" E ASPETTA CHE LA SPC}SISTEMI RIDOTTI{2 SPC} 
169,136 ROUTINE VI REGISTRI"; PER IL TOTOCALCIO(2SPC} 

960 DATA 133,97,169,0,133,99, 130 PRINT" L'AUTOSTART. QUINDI {RVS ON}*{RVS OFF}"; 
133,100 DEVI"; 230 PRINT"{RVS ON}*{RVS O0FF}{38 

970 DATA 133,101,133,102,198, 135 IFME$="DISCO"THEN150 SPC} {RVS ON}*{RVS OFF}"; 
97,6,98 140 PRINT" RIAVVOLGERE IL 240 PRINT"{RVS ON}****%*x%**x* 

980 DATA 16,250,88,96 NASTRO DI 3 GIRI E "; lafiefialiofialiefiefialiofialiofiotetofat totti 

990 RETURN 150 PRINT" DARE IL SAVE IN MODO *#w**#**({RVS OFF}"; 

1000 PRINT"{CLR}{2 CUR.GIU}PLAY, CHE IL NOMESIA UGUALE A 250 PRINT"{4 CUR.GIU}{5 SPC} 
WATCH A REPLAY QUELLO"; COPYRIGHT: BARBABELLA 
(P/R)"CHR$ (142) 160 PRINT" USATO PER LEGGERLO FABRIZIO " 

1010 GETFS:IFF$=""THEN1010 {2 SPC}TRANNE IL PRIMO CA"; 260 PRINT"{CUR.GIU} ROMA, 

1020 IFF$="P" THEN 1050 170 PRINT"RATTERE, CHE DEVE VIA B. DE RITIS, 18 - 

1030 IFF$="R"THEN 1120 ESSERE UN"Q$"l1"0$"." TEL.432790" 

1040 GOTO 1010 180 PRINT"AD ESEMPIO, SE HAI 270 PRINTTAB(11)"{2 CUR.GIU}(3 

1050 PRINT"{CLR}{2 CUR.GIU}ONE CARICATO IL PROGRAMMA"; SPC}COMMODORE 64" 

OR TWO PLAYER GAME? (1/2)" 190 PRINT"ORIGINALE CON LOAD 275 PRINTTAB(12)"{RED}{2CUR. 

1060 GET I$::IFI$=""THEN1060 "O$"TEST"O$",ORA DOVRAI GIU} {RVS ON}{16 SPC} 

1070 IFI$="1"THEN I=0:GOTO1100 {3 SPC)”; {RVS OFF}" 

1080 IFI$="2" THENI=1:GOTO 990 192 PRINT"SALVARLO CON SAVE 280 PRINTTAB(12)"{RED}{RVS ON} 

1090 GOTO 1060 "OS SIEST"OS"." (PREMI UN TASTO) {RVS OFF} 

1100 H=0:PRINT"{2CUR.GIU} 193 PRINT:PRINT"LOAD"0$"..... - {PURPLE}" 

JOYSTICK IN PORT 2" VECCHIO "MES 285 PRINTTAB(12)"{RED} {RVS ON} 

1110 PRINT"PRESS "CHR$(34)"@" 194 PRINT:PRINT"SYS 49152 {16 SPC}{RVS OFF}" 
CHR$(34)" TO END":FOR E=l {2 SPC}-NUOVO "MES :G0SUB1500:GOSUB2000 
TO900:NEXT:RETURN :PRINT:PRINT"SAVE"OQ0$"1....- 290 REM INGRESSO DATI 

1120 U=0:N=0:INPUT"FILENAME";N$ NUOVO "MES 300 PRINT"{LT.BLUE}{CLR}{2 SPC} 

1130 OPEN15,8,15:0PEN2,8,2,"0 200 DATA162,10,189,1,8,157, BATTI IL TUO PRONOSTICO:" 
1"+N$+",S,R":INPUT#2,M$ 167,2;169:;0,157?,;1,8, 310 GOSUB1480 

1140 GOTO 1330 202,16,242 320 PRINT:FORK=1T013 

1150 INPUT#2,F(U),G(U) 210 DATA162,77,189,87, 330 IFK<10THENPRINT" "; 

1160 IFF(U)=-1 THEN U=U-1 192,157,178,2,202,16,247, 340 PRINT"{2 SPC}"K"{ORANGE} 
:GOTO1180 169,178,141,2,3 {CBM V} INCONTRO = "; 

1170 U=U+1:GOTO 1150 220 DATA169,2,141,3,3,32,68, :INPUTRS$ (K) 

1180 H=-1:PRINT"{CLR}":GOTO150 192,169,2,133, 254,169, 350 V(K)=LEN(R$(K)):IFV(K)> 

1190 S=1475:TI%=200 167133, 253 3THENPRINT"{CUR.SU}{23 SPC} 

1200 FOR V=0TOU 230 DATA169, 253,162,4,160, {CUR.SU}":GOT0O330 

1210 E=S+G(V):GETAS$ 3,32,216,255,169,164, 360 FORJ=1TOV (K) :E(J)= 

1220 IF F(V)=OTHEN POKES, 141,3,3,169,131 ASC(MID$(R$(K),J,1)) 
PEEK(S)-128:POKE E,PEEK(E) 240 DATA141,2,3,96,169,1, 370 IFE (J) <>49ANDE (3) <>50ANDE 
+128:S=S+G(V) 162,1,160,3,32,186,255, (J)<>88THEN PRINT"{CUR.SU} 

1230 IF F(V)=1 THENPOKES, 32 165,183, 166 {20 SPC}{CUR.SU}":GOT0330 
:POKEE, 32: POKEE+G(V),215 250 DATA187,164,188,32,189, 380 NEXT 
25=S+G(V)+G(V) :GOSUBS560 255,96,169,1,162,1,168, 390 IFE(1)=E(2) THENPRINT"{CUR. 

1240 IFA$="F"THENTI*=TI%-50 32,186,255,160 SU}{26 SPC}{CUR.SU}" 

1250 IFAS$="L"THENTI%*=TI%+50 260 DATA0,169,49,145,187,165, :G0T0330 

1260 IF TI%>1000TKENTI%=1000 183,166,187,164,188,32, 400 IFV(K)=3ANDE (2)=E(3) 

1270 IF TI%<OTHENTI%=0 189, 255,169,0 THENPRINT"{CUR.SU}{26 SPC} 

1280 FORA=1TOTI%:NEXT 270 DATA32, 213, 255,134, 45, {CUR.SU}":GOT0O330 
:NEXTV:PRINT"BY:";M$ 132, 46,162,10,189,167, 410 IFE(1)=E(3) THENPRINT" 

1290 PRINT"{2 CUR.GIU}{RVS ON} 2,157,1,8,202 {CUR.SU}{26 SPC}{CUR.SU}" 
PRESS SPACE BAR 280 DATA16,247,162,4,134,198, :G0T0330 
TO CONTINUE" 189,251,2,157,118,2,202, 420 E(1)=0:E(2)=0:E(3)=0 

1300 GETA$:IFA$<>" "THEN 1300 208, 247,169 430 IFV(K)=1THENF=F+1 

1310 CLOSE2:CLOSE15 290 DATA131,141,2,3,169,164, 440 IFV(K)=2THEND=D+1 

1320 RESTORE:GOTO 110 141,3,3,169,227,141,40, 450 IFV(K)=3THENT=T+1 

1330 INPUT#15,EN,EM$,ET,ES 3,76,131 460 IFK=30RK=60RK=9THENPRINT" 

1340 IF EN>OTHENPRINTEM$ 300 DATA164,147,82,117,13 {LT.BLUE}{25 SH C}" 

:GOTO 1360 470 NEXT:GOSUB1480 
1350 GOTO 1150 TOTORIDOTTO 480 PRINT"{LT.BLUE}{CUR.GIU} CI 
1360 CLOSE15:CLOSE2:GOTO 1120 100 REM * SISTEMI RIDOTTI SONO"T"TRIPLE"D"DOPPIE 
TOTOCALCIO * E"F"FISSE" 

AUTOSTART 110 PRINT"{CLR}":CLR 490 PRINT 

9 QS$=CHR$ (34) :PRINTCHRS 120 B=7:P0=53280:POKEPO, 6 500 PRINT" {RVS ON}[P]{RVS OFF} 
(147) "ATTENDERE" :POKEPO+1, 0 = PROSEGUI{5 SPC}{RVS ON} 

15 FORI=49152T049316:READA 140 DIMPP$(13),P$(13,32), [H] {RVS OFF} = HARD COPY" 
:B=B+A:POKEI,A:NEXT D$(2,13),R$(13), :G0SUB2500 

20 IFB=19763THEN50 X$(13),V(13) 510 REM ANALISI SITUAZIONE 

30 PRINT"ERROR DATA" 150 FORK=1T010:D(K)=1 520 SC=INT(3*T*2*D) :PRINT" 

40 END :T(K)=1:NEXT {CLR}LO SVILUPPO COMPLETO 


530 
540 
545 
550 
560 
570 
580 
590 
600 


610 
620 


630 
640 
650 
660 
670 
680 
690 
700 


710 


720 


730 


740 
750 


760 


770 
780 
790 
800 
810 
820 


830 
840 
850 
860 
870 
880 
890 
900 


910 
920 
930 
940 


950 
960 


970 


980 


990 


—n 


DEL SISTEMA RI-" 
PRINT"CHIEDEREBBE"SC" 
COLONNE, PARI AD" 
PRINT"UNA SPESA 
DI"SC*L"LIRE." 
PRINTTAB(11)"{RED}{RVS ON} 
(PREMI UN TASTO) {RVS OFF} 
{LT.BLUE}":GOSUB1500 
IFT=0ANDD<7THEN1530 
IFT=0THENSR=INT(16*2*(D-7)) 
IFT=1ANDD<7THEN1530 
IFT=1THENSR=INT(48*2°(D-7)) 
IFT=2ANDD<7THEN1530 
IFT=2THENSR=INT(144*2% 
(D-7)) 
IFT=3THENSR=INT(5*2*D) 
IFT>3THENSR=INT (3% 
(T-2)*2*D) 
PRINT"{CUR.GIU}MENTRE 
INVECE COL SISTEMA RIDOTTO" 
PRINT"CHE TI ELABORERO', LO 
SVILUPPO SI RIDU-" 
PRINT"CE A SOLTANTO"SR" 
COLONNE, PARI AD" 
PRINT"UNA SPESA 
DI"SR*L"LIRE." 
GOSUB1480:PRINT"{CUR.GIU}IL 
RAPPORTO DI RIDUZIONE E'" 
PRINTTAB(15)"{CUR.GIU}" 
INT (SC/SR+.5) 
PRINT"{CUR.GIU}E RISPARMIE- 
RAI" (SC-SR)*L"LIRE MAN-" 
PRINT"TENENDO LA {RVS ON} 
CERTEZZA DI REALIZZARE 
AL-{RVS OFF}" 

PRINT"{RVS ON}MENO UN 12 
{RVS OFF} E LA PROBABILITA' 
(CIRCA IL" 
PRINTINT(1/(SC/SR+.5)*1000 
+.1)/10" %) DI FARE ANCHE 
UN TREDICI." 
PRINT"{CUR.GIU}DOVRAI 
RIEMPIRE"INT(SR/8+.9) 
"SCHEDINE"; 

PRINT" A RICALCO.":PRINT 
PRINT" {RVS ON}(P]{RVS OFF} 
= PROSEGUI(5 SPC}{RVS ON} 
{H]) {RVS OFF} = HARD COPY" 
:GOSUB2500 

REM INIZIO ELABORAZIONE 
DATI 

PRINT"{CLR}" 
IFD>OTHENGOSUB1600 
IFT>2THENYY=l 
FORC=1TOSR:P$="" 
FORJ=1T013 
IFV(J)=1THENPP$ (J) 

=R$ (J) :GOTO1410 
IFV(J)=2ANDT<3THEN880 
IFV(J)=2THEN1030 
IFT<3THEN1290 
IFT=3THEN1160 

GOTO1220 

REM 7 DOPPIE 
IFYY=1THEN1030 
ND=ND+1:IFND>7THENDD= 
ND-7:GOTO1050 
IFND=1THENREADD$ 
IFLEN(D$)<>7THEN910 
Q$=MIDS$ (D$, ND, 1) 

IFD$ (1,J)="1"ANDDS$ (2,43) 
="X"THENPP$ (J)=Q$ 
:GOTO1410 
IFD$(1,J)="X"ANDD$ (2,3) 
="1"THENPP$ (J)=0$:GOTO1410 
IFD$ (1,J)="2"ANDD$ (2,43) 
="l"ANDQ$="1"THENPP$ (J) 
=0$ :GOTO1410 

IFD$ (1,J)="1"ANDD$ (2,3) 
="2"ANDQ$="1"THENPP$(J) 
=Q$:GOTO1410 
IFD$(1,J)="2"ANDD$ (2,43) 
="1"ANDQ$="X"THENPP$ 
(J)="2":GOTO1410 

IFD$ (1,J)="l"ANDD$ (2,43) 


1000 


1010 


1020 
1030 
1040 
1050 


1060 
1070 
1080 
1090 


1100 
1110 
1120 
1130 


1140 
1150 
1160 
1170 
1180 
1190 


1200 
1210 
1220 
1230 


1240 
1250 
1260 


1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 


1350 


1360 
1370 
1380 


1390 
1400 
1410 
1420 
1430 
1440 


1450 


1460 
1470 
1480 
1490 


1500 
1510 
1520 
1530 


1540 


1545 
1550 
1555 


="2"ANDO$="X"THENPP$(J) 
="2":GOTO1410 

IFD$ (1,J)="X"ANDD$ (2,3) 
="2"ANDO$="1"THENPP$(J) 
="2":GOTO1410 
IFD$(1,J)="2"ANDD$ (2,3) 
="X"ANDO$="1"THENPP$(J) 
="2":GOTO1410 

PP$ (J)=0$:GOTO1410 

REM DOPPIE INTEGRALI 
DD=DD+1 

IFYY=0THENDM=INT 

(16*3*T) :GOT01080 
IFT=3THENDM=5:GOTO1080 
DM=INT(3*(T-2)) 
D(0)=D(0)}+1 
IFD(0)<=DM* (D-7) ANDYY 
=OTHEN1150 
IFD(0)<=DM*DANDYY=1THEN1150 
D(0)=1:D(1)=D(1)+1 
FORW=1T010 
IFD(W)>2THEND(W)=1 
:D(W+1)=D(W+1)+1 

NEXTW 

PP$ (J)=D$(D(DD),J):GOTO1410 
REM TRE TRIPLE 

NT=NT+1 

IFNT=1THENREADT$ 
IFLEN(T$)>3THEN 
RESTORE:GOTO1180 

QQ$=MIDS$ (T$,NT,1) 

PP$ (J)=00$:GOTO1410 

REM QUATTRO TRIPLE 
NT=NT+1:IFNT>4THENTT 
=NT-4:GOTO1310 
IFNT=1THENREADTS$ 
IFLEN(T$)<4THEN1240 
IFLEN(TS$)>4THEN 
RESTORE:GOT01240 
Z$=MID$ (T$, NT, 1) 

PP$ (J)}=Z$:GOTO1410 

REM TRIPLE INTEGRALI 
TT=TT+1 
IFYY=0THENTM=16:GOT01330 
IFT>3THENTM=9 

T(0)=T(0)+1 
IFT(0)<=TM*(T-4) AND 
T>3THEN1400 
IFT(0)<=(TM*T) AND 
T<3THEN1400 
T(0)=1:T(1)=T(1)+1 
FORWW=1T010 

IFT (WW) >3THENT (WW)=1 
:T(WW+1)=T(WW+1)+1 

NEXTWW 

PP$(J)=T$(T(TT)) 
PS=P$+PP$(J) 

NEXTJ 
IFD$="XXXXXXX"THENRESTORE 
ND=0:NT=0:DD=0:TT=0 
:GOSUB1640 
IFC=SRTHENPRINT" {HOME} {RVS 
ON} [P] {RVS OFF} = PROSE- 
GUI{4 SPC}{RVS ON}[H]{RVS 
OFF} = HARDCOPY":GOSUB2500 
:PRINT"{CLR}" 

NEXTC 

GOTO1580 

REM BARRA ORIZZONTALE 
FORK=1T040:PRINT"{CBM 0}"; 
:NEXT:RETURN 

REM INGRESSO GET 
GETW$:IFW$=""THEN1510 
W=ASC (W$) : RETURN 

REM USCITA PER CALCOLO 
BANALE 

PRINT"{CLR}{2 CUR.GIU} LO 
SVILUPPO E' TROPPO 
ELEMENTARE!!!" 
PRINT"{CUR.GIU} DEVI GIOCA- 
RE UN MINIMO DI 7 DOPPIE," 
PRINT" SE VUOI LO SVILUPPO 
DEL RIDOTTO." 

PRINT"{2 CUR.GIU}) NON VALE 
LA PENA ADOPERARE 


1560 
1570 
1580 


1585 


1590 
1600 


1610 
1620 


1630 
1640 


1650 
1660 


1670 
1680 


1690 


1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 


1790 


1800 


1810 
2000 


2010 


2020 
2500 


2510 
2520 
20000 
20010 
20020 
20030 


20040 
20050 
20060 


20070 
20080 


20090 


20100 
20110 


20120 
20130 
20140 





UN CERVELLO” 

PRINT" ELETTRONICO PER UN 
CALCOLO COSI' SEM-" 
PRINT" PLICE: BASTA UNA 
MENTE UMANA!" 

PRINT"{5 CUR.GIU} {RVS ON} 
PREMI [RETURN] PER ALTRE 
COMPILAZIONI" 
GETWS:IFW$<>CHR$ (13) 
THEN1585 

GOTO110 

REM RIEMPIMENTO DS$(1,K) 
D$ (2,K) 
FORK=1T013:IFV(K)=10RV (K) 
=3THEN1630 
D$(1,K)=LEFT$(R$(K),1) 
:D$ (2, K)=RIGHT$ (R$ (K),1) 
NEXT: RETURN 

REM SVILUPPO COLONNE SULLO 
SCHERMO 
IFN=0O0RN=8THENN=0:CV=CV+1 
:GR=GR+1:GOTO1680 
N=N+1:CC=CC+1 

GOTO1710 
IFCV>4THENCV=1:CC=0 
:PRINT"{HOME} {RVS ON}[P] 
{RVS OFF}=PROSEGUI{2 SPC} 
{RVS ON}[H]{RVS OFF}=COPY" 
:GOSUB2500:PRINT"{CLR}" 
PRINT"{HOME}{18 CUR.GIU}" 
SPC (CV*9-8)"{RVS ON}GR. 
"GR"{RVS OFF}" 

GOTO1660 

FORR=1T013 

P$(R,CC)=MID$ (P$,R,1) 
PRINTX$ (R) SPC (N+CV*9-10) 
P$ (R,CC) 

NEXT 

RETURN 

REM DATA 
DATA"X21","21X","2x2", 
CI12 MIXX" VILLI® RYRXI®, 
CII2I®, RINZIO 
DATA"X21X","21XX","12Xx2", 
"x122","2X12" 
DATA"1111111","1X11XX1", 
"I 1X1X1X", "IMIIXAX®, 
“PLLMISOE”, "ILIVREX® 
DATA"11XXXX1","1XXX111", 
"XIL1XXX", "XX1111x"; 
SXIXITXL", "IXX1IMI1" 
DATA"X11XX11","XX1X1X1", 
SAT YAIIN, SOOG0ON 
PRINT"{CLR}{10 CUR.GIU} 
INSERISCI IL COSTO DI UNA 
COLONNA: " 
INPUT" {CUR.GIU} 
LIT.: ";L 
RETURN 
GETWS:IFW$="H" 
THENGOSUB20000 
IFW$<>"P"THEN2500 

RETURN 

REM —HARDCOPY 

G1$=CHR$ (15) 

OPEN4, 4:PRINT#4:G1=984 
FORG0=0T024:G0$=G1$ 
:G1=G1+40 

FORG2=G1T0G1+39 

:G3=PEEK (62) 
IFG3>128THENG3=G3-128 
:G4=1:G0$=G0$+CHR$ (18) 

IF (G3>0)*(G3<32) 
THENG3=G3+64:GOTO20100 

IF (G3>31)*(G3<64) THEN20100 
IF (G3>63) * (G3<96) THENG3 
=G3+128:GOT020100 

IF (G3>95) * (G3<128) THENG3 
=G3+64:GOTO20100 
GO$=G0$+CHRS$ (G3) 
IFG4=1THENGO$=G0$+ 

CHR$ (146) :G4=0 
NEXTG2:PRINT#4,G0$:NEXTGO 
PRINT#4:CLOSE4 

RETURN 


COSTO 


13 


AI mercato 





PIAZZA AFFARI 


Cerco programma dal titolo "Home Video 
Producer della Epix per C64 completo di 
istruzioni. Polito Alessandro via Chimirri, 
19 - 88100 Catanzaro. Tel. 0961/727622. 


Per una espansioni di memoria per C128 
offro: a) disk drive da 5.25"; b) 50 dischi 
nuovi; c) tavola grafica Koala Pad più 










Inviare questo coupon a: 
SC Super Club 64 
DTP Studio 


via Matteotti, 14 - 28043 BELLINZAGO NOVARESE (NO) 


programma; d) Final Cartridge 3 (manuale 
in italiano). Cerco disk drive 1581 per 
(128. Cerco istruzioni del programma 
Enhanced Sid Player per C128. Poltronieri 
Luigi via Galliano, 1-22075 Caccivio (CO). 
Tel. 031/492093. 


Vendo programmi come Geos 1.2-1,3- 








2.0; Koala Paint; Magic Desk: Easy Script, 
Dgraph eccetera a sole L. 2000 l'uno. Ven- 
do stampante MPS 803 in ottime condizio- 
ni a L. 200.000 (con manuale d'uso e con- 
fezione originale). Tramontani Andrea via 
Della Repubblica, 3- 48024 Massalombar- 
da (RA). Tel. 0545/970007. 


Cerco istruzioni per Home Video Produ- 
cer, anche fotocopia e cerco programma 
di grafica sudisco per C64. Caranci Ugo via 
Bramante, 13 - 61020 Lunano (PS). Tel. 
0722/70136. 


Cerco per C64 su disco 0 cassetta Drago- 
n's Lair Il. Telefonatemi! Scambio anche 
videogames su disco o cassetta. Sergi 
Daniele via 5 Santi, 64/6 - 16134 Genova. 





enalotto, totip e totocalcio. Scrivere a Pe- 
scatore Roberto v.le Repubblica, 46 - 
33080 Fiume Veneto (PN). 


Cerco compilatore BASIC "Sprint 2° per 
C64 pubblicato su Super Commodore 64/ 
128 n° 41 anno 7 (marzo 1991). De Marzi 
Andrea via Vaccamorta, 1- 17040 Quiliano 
(SV) 


Vendo giochi per C64 attuali, su disco e 
cassetta, a L. 2500 cadauno. Tramontani 
Andrea via della Repubblica, 3 - 48024 
Massa Lombarda (RA). Tel. 0545/970007. 


Vendo e scambio programmi su disco e 
nastro per C64. Cerco linguaggio "C" con 
manuale e applicazioni GEOS. Richiedere 






Tel. 231869 





























Tutti i programmi pubblicati sulla rivista sono registrati 
sul disco allegato: una volta caricati, sono già pronti 
all'uso. MLX1.1 servirà solo per inserire i listati 
esadecimali qualora si volessero apportare modifiche 0 
personalizzazioni ai programmi pubblicati. 





MLX 1.1è un programma che permette di introdurre senza 
errori i listati in linguaggio macchina sia per il Commodore 
64 che per il Commodore 128 in modo 64 infatti, volendo 
introdurre un programma scritto in linguaggio macchina, 
bisogna caricare e dare il RUN a MLX 1.1. Gli indirizzi di 
partenza e di chiusura richiesti, vengono di volta in volta 
specificati nel relativo articolo. Se non avete molta dimesti- 
chezza con il linguaggio macchina, sia tali indirizzi sia i 
valori da introdurre, vi potranno apparire alquanto strani 
anche se altro non sono che i simboli del sistema esadeci- 
male in base 16 usato per i programmi I.m. e comprendente 
i numeri da 029 e le lettere da A a F. 

Caricato e lanciato MIX 1.1, vi verrà chiesto come prima 
cosa di introdurre l'indirizzo iniziale (di partenza) e quello 
finale (di chiusura): batteteli nell'ordine facendoli seguire 


da RETURN ed il programma vi chiederà ora se volete pulire 
l’area di lavoro, rispondete con Y (sì) facendolo seguire da 
RETURN. In questo modo il computer andrà a mettere tutti 
zeri nell'area di memoria compresa tra l'indirizzo iniziale e 
quello finale. Qui giunti, il computer vi presenterà il menu: 
per introdurre un programma, dovrete scegliere la prima 
opzione cioè /mmettere dati. Premendo la | vi verrà nuova- 
mente chiesto l'indirizzo della linea dalla quale volete 
partire, se lo iniziate in quel momento, l'indirizzo corrì- 
sponderà a quello di partenza, mentre se avrete digitato già 
in parte il lle dei l'indirizzo da impostare sarà quello 
successivo all'ultimo battuto in precedenza. Assicuratevi 
che l'indirizzo corrisponda a quello della linea del listato, 
viceversa i dati non verranno accettati 

Per tornare al menu da qualsiasi opzione è sufficiente 
battere RETURN.Ogni linea è composta da nove coppie di 
numeri o lettere, le prime otto sono i dati, la nona il 
checksum. Se la linea è stat battuta correttamente, udrete un 
beep e il programma passerà alla linea successiva, al 
contrario non verrà accettata. Uno dei vantaggi di MLX 1.1 
è quello di non dover sempre introdurre il numero dì linea. 
Per quanto riguarda il checksum, è molto potente: se si 
digita AO invece di OA, verrà segnalato l'errore; unica 
eccezione FF e 00, scambiandoli l'errore passa inosserva- 
to, fate quindi attenzione. Per cancellare un errore di 
battitura, usare il tasto INST/DEL o il tasto cursore verso 
sinistra. Il RETURN funziona solo prima di digitare qualche 
dato della linea, mentre il tasto CLR/HOME pulisce la linea 
dopo un messaggio di errore. 


Vendo, per C64, programmi di scacchi, 


lista gratuita a Schifano Rag. Mario Contra- 
da Sinagia, 1158 Salemi (PT). Tel. 0924/ 
68954 ore pasti 





La seconda opzione del menu riguarda la visualizzazione 
dei datî anche qui, premendo V, viene chiesto l'indirizzo di 
partenza dopodiché verranno presentati tutti i dati da tale 
indirizzo fino alla fine della memoria: è una opzione molto 
utile anche per trasferire dati ad un altro computer per via 
seriale. Con la barra SPAZIO è possibile mettere in pausa 
la visualizzazione dei dati che verrà ripresa battendo nuo- 
vamente sulla barra SPAZIO. 

Altre due importanti opzioni sono il /oad e il save con le 
quali è possibile caricare 0 salvare il programma su disco 
(0 nastro). Ogni qualvolta si debba salvare un programma, 
è necessario usare nomi differenti. Il programma MLX 1.1 
riporta tutti i messaggi standard del Commodore 64 più i tre 
che seguono: 

INDIRIZZO DI PARTENZA NON VALIDO, da cui si deduce 
che il programma che si vuol caricare non inizia all'indirizzo 
specificato in partenza. 

LOAD FINITO A... indirizzo, indica che il programma che si 
tenta di caricare termina prima dell'indirizzo finale specifi- 
cato in partenza. 

TRONCATO ALL'INDIRIZZO FINALE..., indica che il pro- 
gene che si intende caricare termina oltre l'indirizzo 
inale specificato in partenza. 

Se incappate in uno di questi errori, dovrete uscire da MLX 
1.1tornando al BASIC con l'opzione fine, dare nuovamente 
il RUN e battere gli indirizzi esatti. 

Se il programma da digitare è particolarmente lungo, si 
consiglia di salvare, caricare e verificare frequentemente 
per evitare di ribattere dati già digitati in precedenza. 


1 4 PI TITTI ET ENSISS SCIE A N n IR Re n. free I 


OFFERTA 
SENSAZIONALE tt! 


A SOLE L ] 9.500 PUOI RICHIEDERE IL TUO SOFTWARE PREFERITO 
SCEGLIENDO TRA LE COMBINAZIONI SOTTO RIPORTATE. 





codice PP POKER PACKET. OVVERO QUATTRO FLOPPY DISK PIENI DI 
PROGRAMMI PER IL TUO COMMODORE 64! 

codice TP TRIS PACKET. OVVERO TRE FLOPPY DISK PIENI DI PROGRAMMI 
PER IL TUO COMMODORE 1283! 

codice SD _—SUPER DISK. OVVERO UN FLOPPY DISK CON LE QUATTRO 
UTILITY... PIU' UTILI! 


PER ORDINARLI NON DOVETE FARE ALTRO CHE COMPILARE IL COUPON ED 
INVIARLO, IN BUSTA CHIUSA, A: 
DTP STUDIO VIA MATTEOTTI, 14 - 28043 BELLINZAGO NOVARESE (NO) 


LA SPEDIZIONE AVVERRA' IN CONTRASSEGNO SU TUTTO IL TERRITORIO 
NAZIONALE CON SPESE A CARICO DEL DESTINATARIO. 


Disk 1 grafica. 18 immagini 
digitalizzate in hires 
Disk 2 scienze: ecologia - legge di Ohm 
- chimica - formule - problemi 
Disk 3 varî. grafica a colori - word 
processor - operazioni matematiche - li Gui ni 
puzzle - jumping jack - sound effects - 7 
testa 0 croce Or O SO SOFIA RE Ge 
Disk 4 vari. wet paint - viper.c - raster COGNOME NOME 
interrupt - 64 fast poke - wheel of INDIRIZZO FIESZE EZINE 
tp Brtne-totmester-C64 vedgec ie TP dii 
isk 7: chort v2.0 - inventario casa - TANO © ——T a —"—— """r— 
envelope maker 40 - (128 filer - quick Wr _______ e __________m 











" 
I 
} 
Ds 





file - libro indirizzi - mail list - biblioteca 3 

- copia file a 2 drive - etichette dischi QUANTITA CODE DESCRIZIONE 
Disk 2: pxterm 3.5 - 8563 explorer - QUANTITA” _ CODICE — DESCRIZIONE 
boomerang 128 - doodle viewer - QUANTITA’ _ CODICE DESCRIZIONE 
(128 copy - zap 1571 - checkbook QUANTITA” CODICE DESCRIZIONE 
Disk 3: i isc doctor 128 - seq read 128 
- nightmare.adv - (128 xmodem - 
arena - sprite editor 
Data Base - Busicak - 
Compilatore - Image System. 


TOTALE A PAGARE lire + spese spedizione 


SEI Usare: I Leu corsa [umeso SL” roses ume: due fuse; Cesi CO 
N 
SESSI NEMENT  liseSt) SSN O COMIDI DTS) |nne)  fces Tass ume! uni deri ilo 


FIRMA 


Leccese eee nea 





frena sf a To E hbè-=—=-—@Crr<@@cs cicoria ara TA car Aia a set era TE 37 pe. ] 1 5 


TAM - TAM 


TI PIACE SC SUPERCLUB? HAI, TRA | TUOI AMICI, 
APPASSIONATI SESSANTAQUATTRISTI? 


ECCO UN'OPPORTUNITA' PER FARLI FELICI!!! 
REGALA UN ABBONAMENTO 
A SC SUPERCLUB 64... 
sssE PASSA PAROLA! 
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Ecco la soluzione 
alle interconnessioni MIDI 


midi.) 
uagic 


by APEL. 


Inviare il presente talloncino in busto chiust0 —Morsezze n 
eine RO CATALOGO È AP.EL. Applicazioni Elettroniche TE G o È DEL MESE i 
ovacavi MIDI — ì Divisione MIDI Magic ‘di cavetti composto come segue: 

= IDI monitor 49. I via S. Siagia 3 e 2x1m 

i “To 4 ene î = I 20059 VIMERCATE (MI) e 2x3m 

E E) 

sE e Iector BOX IX: n NOME 

con alimentatore esterno —L. 125.000 


= e25m 
E "SCONO O 2A Tutti i cavetti sono colorati diversamente 
i Interfaccia MIDI I COGNOME 

i = A500/20001in-2outt L.49.000 ! 


per distinguerli più rapidamente. 
I INDIRIZZO 


- ——____ Ed in più, 2 adattatori femmina/femmina 
si 0 
. bs - 
CAP. CITTA' È 
CO —_-+TH+1ì WizZTT 
TE IL NOSTRO CATALO TENDONO IV 
RICH EMPILANDO ED INVIANDO I Desidero ricevere a casa il para Ron Î i (Ant PA [1] \T8TY CONTRASSERUOA i 

IL TALLONCINO QUI A LATO 4 dei prodotti MIDI Magic by AP. EL. L CARICO DEL SITL 2 





per le prolunghe. Il tutto a L. 67.00 


e “° n a‘*“Rn " e € n n me no 
pu 
SLERRCORLRO LORA LO ZIIACA FE COTTO OLE IONE LOSE FIRE III ORI ARO EROI ga 


SORTE 


SR ig: 





